home *** CD-ROM | disk | FTP | other *** search
/ Gekikoh Dennoh Club 5 / Gekikoh Dennoh Club Vol. 5 (Japan).7z / Gekikoh Dennoh Club Vol. 5 (Japan) (Track 01).bin / internet / webx / jpged26s.lzh / Error.s < prev    next >
Text File  |  1996-11-10  |  3KB  |  157 lines
  1.     .include    DOSCALL.MAC
  2.     .include    JPEG.MAC
  3.     .include    work.inc
  4.  
  5.     .xref    msgCR
  6.     .xref    Restore_vector
  7.     .xref    Comment_msg,Qtable_msg,file_msg,not_found_msg
  8.     .xref    cant_PROC_msg
  9.     .xref    ParamMsg
  10.     .xref    illegal_size_msg
  11.     .xref    out_of_memory_msg
  12.     .xref    not_JPEG_msg
  13.     .xref    no_picture_msg
  14.     .xref    Write_error_msg
  15.     .xref    Read_error_msg
  16. *    .xref    no_sup_24_msg
  17.     .xref    LoadForceContinue
  18.     .text
  19.  
  20. *║╧▌─▐╫▓▌┤╫░
  21. *----------------------
  22. .xdef    Switch_Error
  23. Switch_Error
  24.         pea    ParamMsg(pc)
  25.         bra    Disp_error_end
  26.  
  27. *ÉöÆlé¬ö═ê═èO
  28. *----------------------
  29. .xdef    Illegal_size_error
  30. Illegal_size_error
  31.         pea.l    illegal_size_msg(pc)
  32.         bra    Disp_error_end
  33.  
  34. *╥╙╪é¬æ½éΦé╚éó
  35. *----------------------
  36. .xdef    Memory_error
  37. Memory_error
  38.         pea.l    out_of_memory_msg(pc)
  39.         bra    Disp_error_end
  40.  
  41. *JPEG╠º▓┘é╞ë≡Ä▀Åoùêé╚éó
  42. *----------------------
  43. .xdef    Not_JPEG_error
  44. Not_JPEG_error
  45.         pea.l    not_JPEG_msg(pc)
  46.         bra    Disp_error_end
  47.  
  48. *JPEG╠º▓┘é╞ë≡Ä▀Åoùêé╚éó
  49. *----------------------
  50. .xdef    No_Picture_error
  51. No_Picture_error
  52.         pea.l    no_picture_msg(pc)
  53.         bra    Disp_error_end
  54.  
  55. *î╗╩▐░╝▐«▌é┼é═æ╬ë₧Åoùêé╚éó
  56. *----------------------
  57. .xdef    Cant_PROC_error
  58. Cant_PROC_error
  59.         pea.l    cant_PROC_msg(pc)
  60.         bra    Disp_error_end
  61.  
  62. *Åæé½ì₧é▀é╚éó
  63. *----------------------
  64. .xdef    Write_error
  65. Write_error
  66.         pea.l    Write_error_msg(pc)
  67.         bra    Disp_error_end
  68.  
  69.  
  70. *ê┘Åφé╚JPEG╠º▓┘é┼éáéΘ
  71. *----------------------
  72. .xdef IllegalJPEG
  73. IllegalJPEG
  74. *        btst.b    #6,SysFlag3(a6)
  75. *        beq    Read_error
  76.         move.l    ErrorStackPoint(a6),d0
  77.         bze    Read_error
  78.         movea.l    d0,sp
  79.         bra    LoadForceContinue
  80.  
  81. *ô╟é▌ì₧é▀é╚éó
  82. *----------------------
  83. .xdef    Read_error
  84. Read_error
  85.         pea.l    Read_error_msg(pc)
  86.         bra    Disp_error_end
  87.  
  88. *24bitôWèJé═╗╬▀░─é╡é─éóé╚éó
  89. *----------------------
  90. *.xdef    no_sup_24_error
  91. *no_sup_24_error
  92. *        pea.l    no_sup_24_msg(pc)
  93. *        bra    Disp_error_end
  94.  
  95. *JPEG╠º▓┘é¬î⌐é┬é⌐éτé╚éó
  96. *----------------------
  97. .xdef    JPEG_not_found
  98. JPEG_not_found
  99.  
  100.         pea.l    fname(a6)
  101.         bra    File_not_found
  102.  
  103. *ë╝æzëµû╩╠º▓┘é¬î⌐é┬é⌐éτé╚éó
  104. *----------------------
  105. .xdef    VS_not_found
  106. VS_not_found
  107.  
  108.         pea.l    VSname(a6)
  109.         bra    File_not_found
  110.  
  111. *║╥▌─╠º▓┘é¬î⌐é┬é⌐éτé╚éó
  112. *----------------------
  113. .xdef    Comment_not_found
  114. Comment_not_found
  115.  
  116.         pea.l    Comment(a6)
  117.         pea.l    Comment_msg(pc)
  118.         bra    _file_not_found
  119.  
  120. *ù╩Äqë╗├░╠▐┘╠º▓┘é¬î⌐é┬é⌐éτé╚éó
  121. *----------------------
  122. .xdef    Qtable_not_found
  123. Qtable_not_found
  124.  
  125.         pea.l    Qname(a6)
  126.         pea.l    Qtable_msg(pc)
  127.  
  128. _file_not_found
  129.  
  130.         DOS    _PRINT
  131.  
  132. *╠º▓┘é¬î⌐é┬é⌐éτé╚éó
  133. *----------------------
  134. File_not_found
  135.  
  136.         pea.l    file_msg(pc)
  137.         DOS    _PRINT
  138.         addq.l    #4,sp
  139.         DOS    _PRINT
  140.         addq.l    #4,sp
  141.         pea.l    not_found_msg(pc)
  142.  
  143. Disp_error_end
  144.         DOS    _PRINT
  145.         pea.l    msgCR(pc)
  146.         DOS    _PRINT
  147.  
  148.         bsr    Restore_vector
  149.  
  150.         move.w    #17,-(sp)
  151.         dos    _CONCTRL    *╢░┐┘ò\Ī
  152.  
  153.         move.w    #9,(sp)
  154.         dos    _EXIT2
  155.  
  156.     .end
  157.